home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / compuserve-file-archive / 22 Graphics & Utilities / SANTA.BIN / c64.bas
Unknown  |  2019-04-13  |  2.7 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
66% dexvert GW-BASIC (document/gwBasic) ext Supported
66% dexvert GFA-BASIC Atari (other/gfaBASICAtari) ext Supported
1% dexvert Amiga BASIC Protected File (other/amigaBASICProtectedFile) ext Unsupported
1% dexvert BAS VBDOS Pro 1.0 Source (other/basVBDOSPro10Source) ext Unsupported
1% dexvert Visual Basic Tokenized Source (other/visualBasicTokenizedSource) ext Unsupported
1% dexvert ZBASIC (other/zbasic) ext Unsupported
100% file data default
100% gt2 Kopftext: '1 REM SANTA CLAUS default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 31 20 52 45 4d 20 53 41 | 4e 54 41 20 43 4c 41 55 |1 REM SA|NTA CLAU|
|00000010| 53 0a 32 20 52 45 4d 20 | 43 48 41 52 4c 45 53 20 |S.2 REM |CHARLES |
|00000020| 54 59 4c 45 52 20 20 37 | 34 36 30 32 2c 31 31 37 |TYLER 7|4602,117|
|00000030| 35 0a 33 20 52 45 4d 20 | 53 45 50 54 45 4d 42 45 |5.3 REM |SEPTEMBE|
|00000040| 52 20 31 39 39 34 0a 31 | 30 20 52 45 4d 20 2a 2a |R 1994.1|0 REM **|
|00000050| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000060| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0a 31 |********|******.1|
|00000070| 31 20 52 45 4d 20 2a 20 | 20 20 20 20 20 20 20 20 |1 REM * | |
|00000080| 54 49 54 4c 45 20 53 43 | 52 45 45 4e 20 20 20 20 |TITLE SC|REEN |
|00000090| 20 20 20 20 20 2a 0a 31 | 32 20 52 45 4d 20 2a 2a | *.1|2 REM **|
|000000a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0a 31 |********|******.1|
|000000c0| 35 20 43 4c 52 3a 50 4f | 4b 45 35 33 32 38 30 2c |5 CLR:PO|KE53280,|
|000000d0| 32 3a 50 4f 4b 45 35 33 | 32 38 31 2c 36 0a 31 36 |2:POKE53|281,6.16|
|000000e0| 20 50 52 49 4e 54 22 93 | 05 22 3b 3a 46 4f 52 41 | PRINT".|.";:FORA|
|000000f0| 3d 31 54 4f 31 30 30 30 | 3a 4e 45 58 54 0a 31 37 |=1TO1000|:NEXT.17|
|00000100| 20 41 41 3d 30 3a 50 52 | 49 4e 54 22 13 2a 2a 2a | AA=0:PR|INT".***|
|00000110| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000120| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000130| 2a 2a 2a 2a 2a 22 3b 0a | 31 38 20 50 52 49 4e 54 |*****";.|18 PRINT|
|00000140| 22 2a 22 53 50 43 28 33 | 38 29 22 2a 22 3b 0a 31 |"*"SPC(3|8)"*";.1|
|00000150| 39 20 41 41 3d 41 41 2b | 31 3a 49 46 41 41 3d 32 |9 AA=AA+|1:IFAA=2|
|00000160| 33 54 48 45 4e 32 31 0a | 32 30 20 47 4f 54 4f 31 |3THEN21.|20 GOTO1|
|00000170| 38 0a 32 31 20 50 52 49 | 4e 54 22 2a 2a 2a 2a 2a |8.21 PRI|NT"*****|
|00000180| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000190| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000001a0| 2a 2a 13 22 3a 50 4f 4b | 45 32 30 32 33 2c 34 32 |**.":POK|E2023,42|
|000001b0| 3a 50 4f 4b 45 35 36 32 | 39 35 2c 31 0a 32 32 20 |:POKE562|95,1.22 |
|000001c0| 46 4f 52 42 3d 31 54 4f | 31 30 30 30 3a 4e 45 58 |FORB=1TO|1000:NEX|
|000001d0| 54 0a 33 30 20 50 52 49 | 4e 54 22 13 11 11 11 22 |T.30 PRI|NT"...."|
|000001e0| 20 53 50 43 28 31 34 29 | 20 22 53 41 4e 54 41 20 | SPC(14)| "SANTA |
|000001f0| 43 4c 41 55 53 22 0a 33 | 32 20 50 52 49 4e 54 22 |CLAUS".3|2 PRINT"|
|00000200| 11 11 22 20 53 50 43 28 | 31 39 29 20 22 42 59 22 |.." SPC(|19) "BY"|
|00000210| 0a 33 34 20 50 52 49 4e | 54 22 11 22 20 53 50 43 |.34 PRIN|T"." SPC|
|00000220| 28 37 29 20 22 43 48 41 | 52 4c 45 53 20 54 59 4c |(7) "CHA|RLES TYL|
|00000230| 45 52 20 20 37 34 36 30 | 32 2c 31 31 37 35 22 0a |ER 7460|2,1175".|
|00000240| 33 36 20 50 52 49 4e 54 | 22 11 11 22 20 53 50 43 |36 PRINT|".." SPC|
|00000250| 28 33 29 20 22 cf b7 b7 | b7 b7 b7 b7 b7 b7 b7 b7 |(3) "...|........|
|00000260| b7 b7 b7 b7 b7 b7 b7 b7 | b7 b7 b7 b7 b7 b7 b7 b7 |........|........|
|00000270| b7 b7 b7 b7 b7 b7 d0 22 | 0a 33 38 20 50 52 49 4e |......."|.38 PRIN|
|00000280| 54 20 53 50 43 28 33 29 | 20 22 91 b4 20 53 45 4e |T SPC(3)| ".. SEN|
|00000290| 54 20 4d 45 20 45 2d 4d | 41 49 4c 20 41 4e 44 20 |T ME E-M|AIL AND |
|000002a0| 4c 45 54 20 4d 45 20 4b | 4e 4f 57 20 aa 22 0a 34 |LET ME K|NOW .".4|
|000002b0| 30 20 50 52 49 4e 54 20 | 53 50 43 28 33 29 20 22 |0 PRINT |SPC(3) "|
|000002c0| b4 20 57 48 41 54 20 59 | 4f 55 20 54 48 49 4e 4b |. WHAT Y|OU THINK|
|000002d0| 20 4f 46 20 54 48 49 53 | 20 50 52 4f 47 52 41 4d | OF THIS| PROGRAM|
|000002e0| 20 aa 22 0a 34 32 20 50 | 52 49 4e 54 20 53 50 43 | .".42 P|RINT SPC|
|000002f0| 28 33 29 20 22 91 cc af | af af af af af af af af |(3) "...|........|
|00000300| af af af af af af af af | af af af af af af af af |........|........|
|00000310| af af af af af af af ba | 22 0a 35 30 20 50 52 49 |........|".50 PRI|
|00000320| 4e 54 22 11 11 22 20 53 | 50 43 28 31 32 29 20 22 |NT".." S|PC(12) "|
|00000330| 4d 45 52 52 59 20 43 48 | 52 49 53 54 4d 41 53 22 |MERRY CH|RISTMAS"|
|00000340| 0a 35 35 20 46 4f 52 43 | 3d 31 54 4f 34 30 30 30 |.55 FORC|=1TO4000|
|00000350| 3a 4e 45 58 54 0a 36 30 | 20 50 52 49 4e 54 22 11 |:NEXT.60| PRINT".|
|00000360| 22 20 53 50 43 28 35 29 | 20 22 12 20 20 50 52 45 |" SPC(5)| ". PRE|
|00000370| 53 53 20 41 4e 59 20 4b | 45 59 20 54 4f 20 43 4f |SS ANY K|EY TO CO|
|00000380| 4e 54 49 4e 55 45 20 20 | 22 0a 36 35 20 47 45 54 |NTINUE |".65 GET|
|00000390| 5a 24 3a 49 46 5a 24 3d | 22 22 54 48 45 4e 36 35 |Z$:IFZ$=|""THEN65|
|000003a0| 0a 31 30 30 20 52 45 4d | 20 2a 2a 2a 2a 2a 2a 2a |.100 REM| *******|
|000003b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000003c0| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 31 30 31 20 52 45 4d |********|.101 REM|
|000003d0| 20 2a 20 20 20 20 20 20 | 20 20 20 53 41 4e 54 41 | * | SANTA|
|000003e0| 20 43 4c 41 55 53 20 20 | 20 20 20 20 20 20 20 2a | CLAUS | *|
|000003f0| 0a 31 30 32 20 52 45 4d | 20 2a 2a 2a 2a 2a 2a 2a |.102 REM| *******|
|00000400| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000410| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 31 30 35 20 50 52 49 |********|.105 PRI|
|00000420| 4e 54 22 93 22 3b 3a 50 | 4f 4b 45 35 33 32 38 30 |NT".";:P|OKE53280|
|00000430| 2c 30 3a 50 4f 4b 45 35 | 33 32 38 31 2c 36 0a 31 |,0:POKE5|3281,6.1|
|00000440| 30 36 20 50 52 49 4e 54 | 22 20 20 20 20 20 20 20 |06 PRINT|" |
|00000450| 20 20 20 20 1c 12 20 20 | 20 20 20 20 20 20 20 20 | .. | |
|00000460| 20 20 20 92 20 20 20 20 | 20 20 20 20 20 20 20 20 | . | |
|00000470| 20 20 20 20 22 3b 0a 31 | 30 37 20 50 52 49 4e 54 | ";.1|07 PRINT|
|00000480| 22 20 20 20 20 20 20 20 | 20 20 1c 12 20 20 20 20 |" | .. |
|00000490| 20 20 20 20 20 20 20 20 | 20 20 20 20 22 3b 0a 31 | | ";.1|
|000004a0| 30 38 20 50 52 49 4e 54 | 22 20 92 20 20 20 20 20 |08 PRINT|" . |
|000004b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000004c0| 20 12 20 20 22 3b 0a 31 | 30 39 20 50 52 49 4e 54 | . ";.1|09 PRINT|
|000004d0| 22 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |" | |
|000004e0| 20 20 92 20 20 20 20 20 | 20 20 20 22 3b 0a 31 31 | . | ";.11|
|000004f0| 30 20 50 52 49 4e 54 22 | 20 20 20 20 20 20 20 20 |0 PRINT"| |
|00000500| 20 20 20 20 20 12 20 20 | 20 20 05 20 20 20 20 09 | . | . .|
|00000510| 00 20 20 22 3b 0a 31 31 | 31 20 50 52 49 4e 54 22 |. ";.11|1 PRINT"|
|00000520| 20 20 20 1c 20 20 20 20 | 92 20 20 20 20 20 20 20 | . |. |
|00000530| 20 20 20 20 20 20 20 20 | 20 20 20 22 3b 0a 31 31 | | ";.11|
|00000540| 32 20 50 52 49 4e 54 22 | 20 20 12 20 20 20 20 05 |2 PRINT"| . .|
|00000550| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 1c 20 20 | | . |
|00000560| 20 20 92 20 20 22 3b 0a | 31 31 33 20 50 52 49 4e | . ";.|113 PRIN|
|00000570| 54 22 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |T" | |
|00000580| 20 20 20 12 20 20 20 05 | 20 20 20 20 96 20 22 3b | . .| . ";|
|00000590| 0a 31 31 34 20 50 52 49 | 4e 54 22 20 20 20 20 20 |.114 PRI|NT" |
|000005a0| 20 05 20 20 20 20 1c 20 | 20 20 92 20 20 20 20 20 | . . | . |
|000005b0| 20 20 20 20 20 20 20 22 | 3b 0a 31 31 35 20 50 52 | "|;.115 PR|
|000005c0| 49 4e 54 22 20 20 20 20 | 20 20 12 20 20 05 20 20 |INT" | . . |
|000005d0| 20 96 20 20 20 20 20 20 | 20 20 20 20 20 20 20 05 | . | .|
|000005e0| 20 22 3b 0a 31 31 36 20 | 50 52 49 4e 54 22 20 20 | ";.116 |PRINT" |
|000005f0| 1c 20 20 92 20 20 20 20 | 20 20 20 20 20 20 20 20 |. . | |
|00000600| 20 20 20 20 20 05 12 20 | 20 20 96 20 22 3b 0a 31 | .. | . ";.1|
|00000610| 31 37 20 50 52 49 4e 54 | 22 20 20 05 20 20 20 20 |17 PRINT|" . |
|00000620| 96 20 20 20 05 20 20 20 | 20 96 20 20 20 05 20 1c |. . | . . .|
|00000630| 20 20 92 20 20 20 20 20 | 20 22 3b 0a 31 31 38 20 | . | ";.118 |
|00000640| 50 52 49 4e 54 22 20 20 | 20 20 20 20 20 20 20 20 |PRINT" | |
|00000650| 20 05 12 20 20 96 20 20 | 05 20 20 20 90 20 20 20 | .. . |. . |
|00000660| 96 20 20 20 90 20 22 3b | 0a 31 31 39 20 50 52 49 |. . ";|.119 PRI|
|00000670| 4e 54 22 20 20 05 20 20 | 20 96 20 20 1c 20 20 92 |NT" . | . . .|
|00000680| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000690| 22 3b 0a 31 32 30 20 50 | 52 49 4e 54 22 20 05 12 |";.120 P|RINT" ..|
|000006a0| 20 20 96 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | . | |
|000006b0| 20 20 20 20 20 20 1c 20 | 90 20 20 22 3b 0a 31 32 | . |. ";.12|
|000006c0| 31 20 50 52 49 4e 54 22 | 20 92 20 20 20 20 20 20 |1 PRINT"| . |
|000006d0| 20 20 20 20 20 20 20 20 | 20 05 12 20 20 96 20 20 | | .. . |
|000006e0| 20 20 20 20 20 22 3b 0a | 31 32 32 20 50 52 49 4e | ";.|122 PRIN|
|000006f0| 54 22 20 90 20 20 20 96 | 20 20 20 20 20 20 20 20 |T" . .| |
|00000700| 90 20 20 20 20 20 92 20 | 20 20 20 20 20 20 20 22 |. . | "|
|00000710| 3b 0a 31 32 33 20 50 52 | 49 4e 54 22 20 20 20 20 |;.123 PR|INT" |
|00000720| 20 20 05 12 20 20 96 20 | 20 20 20 20 20 20 20 20 | .. . | |
|00000730| 20 20 20 20 20 20 20 20 | 22 3b 0a 31 32 34 20 50 | |";.124 P|
|00000740| 52 49 4e 54 22 20 90 09 | 00 20 20 20 20 20 92 20 |RINT" ..|. . |
|00000750| 20 20 20 20 20 20 20 20 | 20 20 20 20 05 12 20 20 | | .. |
|00000760| 96 20 20 22 3b 0a 31 32 | 35 20 50 52 49 4e 54 22 |. ";.12|5 PRINT"|
|00000770| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000780| 90 20 20 20 20 20 20 20 | 92 20 20 22 3b 0a 31 32 |. |. ";.12|
|00000790| 36 20 50 52 49 4e 54 22 | 20 20 20 20 20 20 20 20 |6 PRINT"| |
|000007a0| 20 20 20 05 12 20 20 96 | 20 20 20 20 20 05 20 20 | .. .| . |
|000007b0| 20 20 20 20 20 22 3b 0a | 31 32 37 20 50 52 49 4e | ";.|127 PRIN|
|000007c0| 54 22 20 20 96 20 20 20 | 20 90 20 20 20 20 20 20 |T" . | . |
|000007d0| 20 92 20 20 20 20 20 20 | 20 20 20 20 20 20 22 3b | . | ";|
|000007e0| 0a 31 32 38 20 50 52 49 | 4e 54 22 20 05 12 20 20 |.128 PRI|NT" .. |
|000007f0| 20 20 96 20 20 05 20 20 | 20 20 20 20 20 20 20 20 | . . | |
|00000800| 20 96 20 20 05 20 20 90 | 20 20 20 22 3b 0a 31 32 | . . .| ";.12|
|00000810| 39 20 50 52 49 4e 54 22 | 20 20 92 20 20 20 20 20 |9 PRINT"| . |
|00000820| 20 20 20 20 20 20 20 20 | 20 05 12 20 20 20 20 20 | | .. |
|00000830| 20 20 20 20 22 3b 0a 31 | 33 30 20 50 52 49 4e 54 | ";.1|30 PRINT|
|00000840| 22 90 20 20 20 20 20 05 | 20 20 20 20 20 20 20 20 |". .| |
|00000850| 90 20 20 20 92 20 20 20 | 20 20 20 20 20 20 22 3b |. . | ";|
|00000860| 0a 31 33 31 20 50 52 49 | 4e 54 22 20 20 20 20 20 |.131 PRI|NT" |
|00000870| 20 05 12 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | .. | |
|00000880| 20 20 20 20 20 20 22 3b | 0a 31 33 32 20 50 52 49 | ";|.132 PRI|
|00000890| 4e 54 22 20 20 20 20 92 | 20 20 20 20 20 20 20 20 |NT" .| |
|000008a0| 20 20 20 20 20 20 20 20 | 12 20 20 20 20 20 22 3b | |. ";|
|000008b0| 0a 31 33 33 20 50 52 49 | 4e 54 22 20 20 20 20 20 |.133 PRI|NT" |
|000008c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 92 | | .|
|000008d0| 20 20 20 20 20 22 3b 0a | 31 33 34 20 50 52 49 4e | ";.|134 PRIN|
|000008e0| 54 22 20 20 20 20 20 20 | 20 20 20 20 12 20 20 20 |T" | . |
|000008f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 22 3b 0a 31 | | ";.1|
|00000900| 33 35 20 50 52 49 4e 54 | 22 20 20 20 20 20 20 20 |35 PRINT|" |
|00000910| 20 20 20 92 20 20 20 20 | 20 20 20 20 20 20 20 20 | . | |
|00000920| 20 20 20 22 3b 0a 31 33 | 36 20 50 52 49 4e 54 22 | ";.13|6 PRINT"|
|00000930| 20 12 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | . | |
|00000940| 20 20 20 20 20 20 20 20 | 20 92 20 22 3b 0a 31 33 | | . ";.13|
|00000950| 37 20 50 52 49 4e 54 22 | 20 20 20 20 20 20 20 20 |7 PRINT"| |
|00000960| 20 20 20 20 20 20 20 20 | 20 12 20 20 20 20 20 20 | | . |
|00000970| 20 20 22 3b 0a 31 33 38 | 20 50 52 49 4e 54 22 09 | ";.138| PRINT".|
|00000980| 00 20 20 20 20 20 20 20 | 20 20 20 20 92 20 20 20 |. | . |
|00000990| 20 20 20 20 20 20 20 20 | 20 22 3b 0a 31 33 39 20 | | ";.139 |
|000009a0| 50 52 49 4e 54 22 20 20 | 20 20 20 20 20 20 12 20 |PRINT" | . |
|000009b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000009c0| 22 3b 0a 31 34 30 20 50 | 52 49 4e 54 22 20 20 92 |";.140 P|RINT" .|
|000009d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000009e0| 20 20 20 20 20 20 12 20 | 22 3b 0a 31 34 31 20 50 | . |";.141 P|
|000009f0| 52 49 4e 54 22 20 20 20 | 20 20 20 20 20 20 20 20 |RINT" | |
|00000a00| 20 20 20 20 20 92 20 20 | 20 20 20 20 20 20 20 22 | . | "|
|00000a10| 3b 0a 31 34 32 20 50 52 | 49 4e 54 22 20 20 20 20 |;.142 PR|INT" |
|00000a20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 12 20 20 | | . |
|00000a30| 20 20 20 20 20 20 22 3b | 0a 31 34 33 20 50 52 49 | ";|.143 PRI|
|00000a40| 4e 54 22 20 20 20 92 20 | 20 20 20 20 20 20 20 20 |NT" . | |
|00000a50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 22 3b 0a | | ";.|
|00000a60| 31 34 34 20 50 52 49 4e | 54 22 20 20 20 20 20 20 |144 PRIN|T" |
|00000a70| 20 20 20 12 20 20 20 20 | 20 20 20 92 13 22 0a 31 | . | ..".1|
|00000a80| 34 35 20 47 45 54 59 24 | 3a 49 46 59 24 3d 22 22 |45 GETY$|:IFY$=""|
|00000a90| 54 48 45 4e 31 34 35 0a | 31 34 36 20 50 52 49 4e |THEN145.|146 PRIN|
|00000aa0| 54 22 93 22 3b 3a 50 4f | 4b 45 35 33 32 38 30 2c |T".";:PO|KE53280,|
|00000ab0| 31 34 3a 50 4f 4b 45 35 | 33 32 38 31 2c 36 3a 45 |14:POKE5|3281,6:E|
|00000ac0| 4e 44 0a | |ND. | |
+--------+-------------------------+-------------------------+--------+--------+